home *** CD-ROM | disk | FTP | other *** search
/ Aminet 37 / Aminet 37 (2000)(Schatztruhe)[!][Jun 2000].iso / Aminet / dev / asm / Tandem2.68.lha / Tandem / Support / opcode_make.asm < prev    next >
Assembly Source File  |  2000-04-02  |  30KB  |  653 lines
  1. * opcode_make.asm  [makes opcode.consts]   0.20   20.2.97
  2.  
  3.  include 'front.i'
  4.  
  5. strings: dc.b 0
  6.  dc.b 'Work2:Tandem/Support/opcode.consts',0  ;1
  7.  dc.b 'Error: can''t open opcode.consts',0    ;2
  8.  dc.b 'Error: bad write to opcode.consts',0   ;3
  9.  dc.b 'opcode.consts written ok',0            ;4
  10.  ds.w 0
  11.  
  12. * opcode templates  $4F=end .i  $4E=macro ref  $4D=error
  13. * 0=no opcode
  14. * pseudo none = $01-$4B       float move,moadic,dyadic  $F0
  15. * pseudo some = $50-$6F       float control no exc      $F1-$F4
  16. * math&c      = $70-$BE       float control exc         $F6-$F9
  17. * control     = $C0-$CA       float priv                $FB-$FD
  18. * priveleged  = $D0-$E9
  19. *                                  ****************************************
  20. * codes                            *
  21. *                                  * opcode.consts file:
  22. * ea0 = all (an not .B)            *  first 4 bytes: filesize of rest
  23. * ea1 = all exc an                 * then 16 bytes per opcode:
  24. * ea2 = all exc an # pc            *  bytes 0-9 null-delimited ascii,padded
  25. * ea3 = all exc dn an # pc         *  10 mc code (see opcode templts above)
  26. * ea4 = all exc an an+ -an # pc    *  11 syntax code (see below)
  27. * ea5 = all exc an an+ -an # dn    *  12-13 raw mc
  28. * ea6 = all exc an #               *  14,15 unused, or 2ndary opcode,&c
  29. * ea7 = all exc an     -an #    dn *
  30. * ea8 = all exc an an+     # pc dn ****************************************
  31. * ea9 = all exc # pc
  32. *
  33. * $00 -    -
  34. * $01 B    dy,dx/-ay,-ax  0-2=y             9-11=x   3=ABCD
  35. * $02 LWB  ea0,dx/ea3,dx  0-5=ea  6-8=ADD   9-11=x
  36. * $03 LW   ea0,ax         0-5=ea  6-8=ADDA  9-11=x
  37. * $04 LWB  #,ea2          0-5=ea  6-7=ADDI  #trails
  38. * $05 LWB  #,ea9          0-5=ea  6-7=ADDI  9-11=#
  39. * $06 LWB  dy,dx/-ay,-ax  0-2=y   6-7=ADDI  9-11=x   3=ABCD
  40. * $07 LWB  ea1,dx/dx,ea3  0-5=ea  6-8=ADD   9-11=x
  41. * $08 B    #,ccr                            #trails
  42. * $09 W    #,sr                             #trails
  43. * $0A LWB  dx,dy/#,dy/ea3 0-5=ea  6-11=shf  0-2=y (B if ea)
  44. * $0B LWBS label          0-7=BCC
  45. * $0C BCHG dx,ea2/#,ea2   0-5=ea  8-11=BCHG #trails
  46. * $0D -    ea4{o:w}       0-5=ea            BFCHGtrl
  47. * $0E -    #              0-2=#
  48. * $0F LWB  dx,dy,ea3      0-5=ea  9-10=CAS  CAStrail
  49. * $10 LW   dn:dn,dn:dn,(rn):(rn)  9-10=CAS2 CAS2tral
  50. * $11 LW   ea1,dx         0-5=ea  7-8=CHK   9-11=x
  51. * $12 LWB  ea5,rx         0-5=ea  9-10=CAS  CHK2tral
  52. * $13 LWB  ea2            0-5=ea  6-7=ADDI
  53. * $14 LWB  ea0,dx         0-5=ea  6-7=ADDI  9-11=x
  54. * $15 LWB  #,ea6          0-5=ea  6-7=ADDI  #trails
  55. * $16 LWB  ay+,ax+        0-2=y   6-7=ADDI  9-11=x
  56. * $17 LWB  ea5,rx         0-5=ea  9-10=CAS  CMP2tral
  57. * $18 W    dx,label       0-2=x             DBCCtral
  58. * $19 LW   ea1,dx[L:dy]   0-5=ea  14-6=DIVS DIVS:trl
  59. * $1A L    ea1,dx:dy      0-5=ea            DIVS:trl
  60. * $1B LW   ea1,dx[L:dy]   0-5=ea  14-6=DIVU DIVU:trl
  61. * $1C L    ea1,dx:dy      0-5=ea            DIVU:trl
  62. * $1D LWB  dx,ea3         0-5=ea  6-7=ADDI  9-11=x
  63. * $1E L    rx,ry          0-2=y   3-7=EXG   9-11=x
  64. * $1F LW   dx             0-2=x   6-7=ADDI
  65. * $20 L    dx             0-2=x
  66. * $21 ~    FMOVE
  67. * $22 X    FMOVECR
  68. * $23 ~    FMOVEM
  69. * $24 X    Fdyad
  70. * $25 X    Fmonad
  71. * $26 X    Fsincos
  72. * $27 WL   FBcc
  73. * $28 W    FDBcc
  74. * $29 B    FScc
  75. * $2A ~    FTST
  76. * $2B -    FRESTORE
  77. * $2C -    FTST
  78. * $2D ~    FTRAP
  79. * $2E B    ea2            0-5=ea
  80. * $2F -    ea5            0-5=ea
  81. * $30 L    ea5,ax         0-5=ea            9-11=x
  82. * $31 LW   ax,#           0-2=x             #trails
  83. * $32 LWB  ea0x,ea2y      0-5=eax 6-11=eay  12-13=MOVE
  84. * $33 LW   ea0,ax         0-5=ea  9-11=x    12-13=MOVE
  85. * $34 W    ea1,ccr/ccr,ea2 0-5=ea 9-10=val
  86. * $35 L    an,usp/usp,an  0-2=ea  3=val
  87. * $36 L    rc,rn/rn,rc            0=drn     MOVECtrail
  88. * $37 LW   ea7,rl/rl,ea8  0-5=ea  10=drn    MOVEMtrail  6=size
  89. * $38 LW   dx,dan/dan,dx  0-2=n   6-8=MOVEP 9-11=x      d trails
  90. * $39 L    #,dx           8-11=x  0-7=#
  91. * $3A LWB  rn,ea3/ea3,rn  0-5=ea  6-7=ADDI  MOVEStrail
  92. * $3B LW   ea1,dx/:dy     0-5=ea  6-15=MULS 9-11=x      MULStrail
  93. * $3C LW   [#]                    0-2=TRAP
  94. * $3D -    #                      0-3=#
  95. * $3E -    -ax,-ay,#/dx,dy,#      0-3=x     9-11=y      3=ABCD  #trails
  96. * $3F L    ea5            0-5=ea
  97. * $40 -    fc,#[,ea]      0-5=ea  PFLUSHtr
  98. * $41 -    -                      PFLUSHAtr
  99. * $42 -    PLOADR
  100. * $43 -    PLOADW
  101. * $44 -    PMOVE
  102. * $45 -    PMOVEFD
  103. * $46 -    PTESTR
  104. * $47 -    PTESTW
  105. * $48 -    #              #trails
  106. * $49 W    dx             0-2=x
  107. * $4A LWB  ea6            0-5=ea  6-7=ADDI
  108. * $4B -    ax             0-2=x
  109.  
  110. * Address Mode                                      Mode subroutines:
  111. *   0 Dn                      18 CCR )but 26         Mode   0-17
  112. *   1 An                      19 SR  )if MOVEC       Modez  0-20
  113. *   2 (An)                    20 USP                 Modef  0-17,22-24
  114. *   3 (An)+                   21 FPn                 Modefl 0-17,25
  115. *   4 -(An)                   22 FPCR                Moder  0-17,26
  116. *   5 (d16,An)                23 FPSR                Modem  0-17,27
  117. *   6 (d8,An,Xn)              24 FPIAR               Amode  Bcc
  118. *   7 (bd,An,Xn)              25 FPreglist           Famode FBcc
  119. *   8 ([bd,An],Xn,od)         26 (MOVEC regs)
  120. *   9 ([bd,An,Xn],od)         27 reglist            Mode &c use:
  121. *  10 (d16,PC)                28 sfc (PFLUSH)        A5=sc
  122. *  11 (d8,PC,Xn)              29 dfc (PFLUSH)        A0=mc
  123. *  12 (bd,PC,Xn)              30 (PMOVE regs)        A6=opcode.consts
  124. *  13 ([bd,PC],Xn,od)                               Mode &c output:
  125. *  14 ([bd,PC,Xn],od)                                A5 bypasses
  126. *  15 xxx.W                                          D3=mode (or EQ, error)
  127. *  16 xxx.L                                          D4=mode,reg mask
  128. *  17 #exp (and Bcc addr)                            D5=no. ext words (0-2)
  129. *                                                    D6=1st ext )unchanged
  130. *                                                    D7=2nd ext )if D5=0
  131.  
  132. * mclines data:
  133. *  0-3 sc addr
  134. *  4-7 mc addr (rel)
  135. *    8 opcode
  136. *    9 1st addr mode
  137. *   10 2nd addr mode
  138. *   11 .i depth
  139. *   12
  140. *   13
  141. *   14
  142. *   15 ext (0=none 1=.B 2=.W 3=.L 4=
  143.  
  144. opcodes:
  145.  dc.b 'abcd',0,'.....',$70,$01,$C1,$00,$00,$00
  146.  dc.b 'add',0,'......',$71,$02,$D0,$00,$06,$00 ;14-15=addi mc
  147.  dc.b 'adda',0,'.....',$72,$03,$D0,$00,$00,$00
  148.  dc.b 'addi',0,'.....',$73,$04,$06,$00,$00,$00
  149.  dc.b 'addq',0,'.....',$74,$05,$50,$00,$00,$00
  150.  dc.b 'addsym',0,'...',$01,$00,$00,$00,$00,$00
  151.  dc.b 'addx',0,'.....',$75,$06,$D1,$00,$00,$00
  152.  dc.b 'align',0,'....',$50,$00,$00,$00,$00,$00
  153.  dc.b 'and',0,'......',$76,$07,$C0,$00,$02,$00 ;14-15=andi mc
  154.  dc.b 'andi',0,'.....',$76,$04,$02,$00,$00,$00 ;}
  155.  dc.b 'andi',0,'.....',$77,$04,$02,$00,$00,$00 ;}andi ccr
  156.  dc.b 'andi',0,'.....',$D0,$04,$02,$00,$00,$00 ;}andi sr
  157.  dc.b 'ascii',0,'....',$51,$00,$00,$00,$00,$00
  158.  dc.b 'asl',0,'......',$78,$0A,$E1,$00,$00,$00 ;byte 14 used
  159.  dc.b 'asr',0,'......',$79,$0A,$E0,$00,$00,$00 ;byte 14 used
  160.  dc.b 'bcc',0,'......',$C0,$0B,$64,$00,$00,$00 ;=bhs
  161.  dc.b 'bchg',0,'.....',$7A,$0C,$01,$40,$00,$00
  162.  dc.b 'bclr',0,'.....',$7B,$0C,$01,$80,$00,$00
  163.  dc.b 'bcs',0,'......',$C0,$0B,$65,$00,$00,$00 ;blo
  164.  dc.b 'bdebugarg',0,'',$02,$00,$00,$00,$00,$00
  165.  dc.b 'beq',0,'......',$C0,$0B,$67,$00,$00,$00
  166.  dc.b 'bfchg',0,'....',$7C,$0D,$EA,$C0,$00,$00
  167.  dc.b 'bfclr',0,'....',$7D,$0D,$EC,$C0,$00,$00
  168.  dc.b 'bfexts',0,'...',$7E,$0D,$EB,$C0,$00,$00
  169.  dc.b 'bfextu',0,'...',$7F,$0D,$E9,$C0,$00,$00
  170.  dc.b 'bfffo',0,'....',$80,$0D,$ED,$C0,$00,$00
  171.  dc.b 'bfins',0,'....',$81,$0D,$EF,$C0,$00,$00
  172.  dc.b 'bfset',0,'....',$82,$0D,$EE,$C0,$00,$00
  173.  dc.b 'bftst',0,'....',$83,$0D,$E8,$C0,$00,$00
  174.  dc.b 'bge',0,'......',$C0,$0B,$6C,$00,$00,$00
  175.  dc.b 'bgt',0,'......',$C0,$0B,$6E,$00,$00,$00
  176.  dc.b 'bhi',0,'......',$C0,$0B,$62,$00,$00,$00
  177.  dc.b 'bhs',0,'......',$C0,$0B,$64,$00,$00,$00 ;=bcc
  178.  dc.b 'bitstream',0,'',$52,$00,$00,$00,$00,$00
  179.  dc.b 'bkpt',0,'.....',$D1,$0E,$48,$48,$00,$00
  180.  dc.b 'ble',0,'......',$C0,$0B,$6F,$00,$00,$00
  181.  dc.b 'blk',0,'......',$6E,$00,$00,$00,$00,$00 ;=ds
  182.  dc.b 'blo',0,'......',$C0,$0B,$65,$00,$00,$00 ;=bcs
  183.  dc.b 'bls',0,'......',$C0,$0B,$63,$00,$00,$00
  184.  dc.b 'blt',0,'......',$C0,$0B,$6D,$00,$00,$00
  185.  dc.b 'bmi',0,'......',$C0,$0B,$6B,$00,$00,$00
  186.  dc.b 'bne',0,'......',$C0,$0B,$66,$00,$00,$00
  187.  dc.b 'bopt',0,'.....',$03,$00,$00,$00,$00,$00
  188.  dc.b 'bpl',0,'......',$C0,$0B,$6A,$00,$00,$00
  189.  dc.b 'bra',0,'......',$C1,$0B,$60,$00,$00,$00
  190.  dc.b 'bset',0,'.....',$84,$0C,$01,$C0,$00,$00
  191.  dc.b 'bsr',0,'......',$C2,$0B,$61,$00,$00,$00
  192.  dc.b 'bss',0,'......',$04,$00,$00,$00,$00,$00
  193.  dc.b 'bt',0,'.......',$C1,$0B,$60,$00,$00,$00
  194.  dc.b 'btst',0,'.....',$85,$0C,$01,$00,$00,$00
  195.  dc.b 'bvc',0,'......',$C0,$0B,$68,$00,$00,$00
  196.  dc.b 'bvs',0,'......',$C0,$0B,$69,$00,$00,$00
  197.  dc.b 'cargs',0,'....',$05,$00,$00,$00,$00,$00
  198.  dc.b 'cas',0,'......',$86,$0F,$08,$C0,$00,$00
  199.  dc.b 'cas2',0,'.....',$87,$10,$08,$FC,$00,$00
  200.  dc.b 'chk',0,'......',$88,$11,$40,$00,$00,$00
  201.  dc.b 'chk2',0,'.....',$D2,$12,$00,$C0,$00,$00
  202.  dc.b 'clr',0,'......',$89,$13,$42,$00,$00,$00
  203.  dc.b 'clrfo',0,'....',$06,$00,$00,$00,$00,$00
  204.  dc.b 'clrrs',0,'....',$3B,$00,$00,$00,$00,$00
  205.  dc.b 'clrso',0,'....',$3B,$00,$00,$00,$00,$00
  206.  dc.b 'cmacro',0,'...',$08,$00,$00,$00,$00,$00
  207.  dc.b 'cmp',0,'......',$8A,$14,$B0,$00,$00,$00
  208.  dc.b 'cmp2',0,'.....',$8E,$17,$00,$C0,$00,$00
  209.  dc.b 'cmpa',0,'.....',$8B,$03,$B0,$C0,$00,$00
  210.  dc.b 'cmpi',0,'.....',$8C,$15,$0C,$00,$00,$00
  211.  dc.b 'cmpm',0,'.....',$8D,$16,$B1,$08,$00,$00
  212.  dc.b 'cnop',0,'.....',$53,$00,$00,$00,$00,$00
  213.  dc.b 'code',0,'.....',$09,$00,$00,$00,$00,$00
  214.  dc.b 'cseg',0,'.....',$0A,$00,$00,$00,$00,$00
  215.  dc.b 'cstring',0,'..',$54,$00,$00,$00,$00,$00
  216.  dc.b 'data',0,'.....',$0B,$00,$00,$00,$00,$00
  217.  dc.b 'db',0,'.......',$55,$00,$00,$00,$00,$00 ;c.f. db nb pb sb ub
  218.  dc.b 'dbcc',0,'.....',$C3,$18,$54,$C8,$00,$00 ;=dbhs
  219.  dc.b 'dbcs',0,'.....',$C3,$18,$55,$C8,$00,$00 ;=dblo
  220.  dc.b 'dbeq',0,'.....',$C3,$18,$57,$C8,$00,$00
  221.  dc.b 'dbf',0,'......',$C3,$18,$51,$C8,$00,$00
  222.  dc.b 'dbge',0,'.....',$C3,$18,$5C,$C8,$00,$00
  223.  dc.b 'dbgt',0,'.....',$C3,$18,$5E,$C8,$00,$00
  224.  dc.b 'dbhi',0,'.....',$C3,$18,$52,$C8,$00,$00
  225.  dc.b 'dbhs',0,'.....',$C3,$18,$54,$C8,$00,$00 ;=dbcc
  226.  dc.b 'dble',0,'.....',$C3,$18,$5F,$C8,$00,$00
  227.  dc.b 'dblo',0,'.....',$C3,$18,$55,$C8,$00,$00 ;=dbcs
  228.  dc.b 'dbls',0,'.....',$C3,$18,$53,$C8,$00,$00
  229.  dc.b 'dblt',0,'.....',$C3,$18,$5D,$C8,$00,$00
  230.  dc.b 'dbmi',0,'.....',$C3,$18,$5B,$C8,$00,$00
  231.  dc.b 'dbne',0,'.....',$C3,$18,$56,$C8,$00,$00
  232.  dc.b 'dbpl',0,'.....',$C3,$18,$5A,$C8,$00,$00
  233.  dc.b 'dbra',0,'.....',$C3,$18,$51,$C8,$00,$00
  234.  dc.b 'dbt',0,'......',$C3,$18,$50,$C8,$00,$00
  235.  dc.b 'dbvc',0,'.....',$C3,$18,$58,$C8,$00,$00
  236.  dc.b 'dbvs',0,'.....',$C3,$18,$59,$C8,$00,$00
  237.  dc.b 'dc',0,'.......',$56,$00,$00,$00,$00,$00
  238.  dc.b 'dcb',0,'......',$57,$00,$00,$00,$00,$00
  239.  dc.b 'debug',0,'....',$0C,$00,$00,$00,$00,$00
  240.  dc.b 'divs',0,'.....',$8F,$19,$81,$C0,$00,$00
  241.  dc.b 'divsl',0,'....',$90,$1A,$4C,$40,$00,$00
  242.  dc.b 'divu',0,'.....',$91,$1B,$80,$C0,$00,$00
  243.  dc.b 'divul',0,'....',$92,$1C,$4C,$40,$00,$00
  244.  dc.b 'dl',0,'.......',$58,$00,$00,$00,$00,$00 ;c.f. dl nl pl sl ul
  245.  dc.b 'doscmd',0,'...',$0D,$00,$00,$00,$00,$00
  246.  dc.b 'ds',0,'.......',$6E,$00,$00,$00,$00,$00 ;=blk
  247.  dc.b 'dsb',0,'......',$6F,$00,$00,$00,$00,$00
  248.  dc.b 'dsbin',0,'....',$59,$00,$00,$00,$00,$00
  249.  dc.b 'dstring',0,'..',$5A,$00,$00,$00,$00,$00
  250.  dc.b 'dw',0,'.......',$6B,$00,$00,$00,$00,$00 ;c.f. dw nw pw sw uw
  251.  dc.b 'dx',0,'.......',$5B,$00,$00,$00,$00,$00
  252.  dc.b 'else',0,'.....',$0F,$00,$00,$00,$00,$00
  253.  dc.b 'elseif',0,'...',$10,$00,$00,$00,$00,$00
  254.  dc.b 'end',0,'......',$11,$00,$00,$00,$00,$00
  255.  dc.b 'endc',0,'.....',$12,$00,$00,$00,$00,$00
  256.  dc.b 'endm',0,'.....',$13,$00,$00,$00,$00,$00
  257.  dc.b 'eor',0,'......',$95,$1D,$B1,$00,$0A,$00 ;14-15=eori mc
  258.  dc.b 'eori',0,'.....',$96,$04,$0A,$00,$00,$00 ;}
  259.  dc.b 'eori',0,'.....',$97,$04,$0A,$00,$00,$00 ;}eori ccr
  260.  dc.b 'eori',0,'.....',$D3,$04,$0A,$00,$00,$00 ;}eori sr
  261.  dc.b 'equ',0,'......',$14,$00,$00,$00,$00,$00
  262.  dc.b 'equr',0,'.....',$15,$00,$00,$00,$00,$00
  263.  dc.b 'even',0,'.....',$5C,$00,$00,$00,$00,$00
  264.  dc.b 'exeobj',0,'...',$16,$00,$00,$00,$00,$00
  265.  dc.b 'exg',0,'......',$98,$1E,$C1,$00,$00,$00
  266.  dc.b 'ext',0,'......',$99,$1F,$48,$00,$00,$00
  267.  dc.b 'extb',0,'.....',$9A,$20,$49,$C0,$00,$00
  268.  dc.b 'fabs',0,'.....',$F0,$25,$F2,$00,$00,$18
  269.  dc.b 'facos',0,'....',$F0,$25,$F2,$00,$00,$1C
  270.  dc.b 'fadd',0,'.....',$F0,$24,$F2,$00,$00,$22
  271.  dc.b 'fail',0,'.....',$D4,$00,$00,$00,$00,$00
  272.  dc.b 'fasin',0,'....',$F0,$25,$F2,$00,$00,$0C
  273.  dc.b 'fatan',0,'....',$F0,$25,$F2,$00,$00,$0A
  274.  dc.b 'fatanh',0,'...',$F0,$25,$F2,$00,$00,$0D
  275.  dc.b 'fbeq',0,'.....',$F1,$27,$F2,$81,$00,$00
  276.  dc.b 'fbf',0,'......',$F1,$27,$F2,$80,$00,$00
  277.  dc.b 'fbge',0,'.....',$F6,$27,$F2,$93,$00,$00
  278.  dc.b 'fbgl',0,'.....',$F6,$27,$F2,$96,$00,$00
  279.  dc.b 'fbgle',0,'....',$F6,$27,$F2,$97,$00,$00
  280.  dc.b 'fbgt',0,'.....',$F6,$27,$F2,$92,$00,$00
  281.  dc.b 'fble',0,'.....',$F6,$27,$F2,$95,$00,$00
  282.  dc.b 'fblt',0,'.....',$F6,$27,$F2,$94,$00,$00
  283.  dc.b 'fbne',0,'.....',$F6,$27,$F2,$8E,$00,$00
  284.  dc.b 'fbnge',0,'....',$F6,$27,$F2,$9C,$00,$00
  285.  dc.b 'fbngl',0,'....',$F6,$27,$F2,$99,$00,$00
  286.  dc.b 'fbngle',0,'...',$F6,$27,$F2,$98,$00,$00
  287.  dc.b 'fbngt',0,'....',$F6,$27,$F2,$9D,$00,$00
  288.  dc.b 'fbnle',0,'....',$F6,$27,$F2,$9A,$00,$00
  289.  dc.b 'fbnlt',0,'....',$F6,$27,$F2,$9B,$00,$00
  290.  dc.b 'fboge',0,'....',$F1,$27,$F2,$83,$00,$00
  291.  dc.b 'fbogl',0,'....',$F1,$27,$F2,$86,$00,$00
  292.  dc.b 'fbogt',0,'....',$F1,$27,$F2,$82,$00,$00
  293.  dc.b 'fbole',0,'....',$F1,$27,$F2,$85,$00,$00
  294.  dc.b 'fbolt',0,'....',$F1,$27,$F2,$84,$00,$00
  295.  dc.b 'fbor',0,'.....',$F1,$27,$F2,$87,$00,$00
  296.  dc.b 'fbra',0,'.....',$F1,$27,$F2,$8F,$00,$00 ;*
  297.  dc.b 'fbseq',0,'....',$F6,$27,$F2,$91,$00,$00
  298.  dc.b 'fbsf',0,'.....',$F6,$27,$F2,$90,$00,$00
  299.  dc.b 'fbsne',0,'....',$F6,$27,$F2,$9E,$00,$00
  300.  dc.b 'fbst',0,'.....',$F6,$27,$F2,$9F,$00,$00
  301.  dc.b 'fbt',0,'......',$F6,$27,$F2,$8F,$00,$00
  302.  dc.b 'fbueq',0,'....',$F1,$27,$F2,$89,$00,$00
  303.  dc.b 'fbuge',0,'....',$F1,$27,$F2,$8B,$00,$00
  304.  dc.b 'fbugt',0,'....',$F1,$27,$F2,$8A,$00,$00
  305.  dc.b 'fbule',0,'....',$F1,$27,$F2,$8D,$00,$00
  306.  dc.b 'fbult',0,'....',$F1,$27,$F2,$8C,$00,$00
  307.  dc.b 'fbun',0,'.....',$F1,$27,$F2,$88,$00,$00
  308.  dc.b 'fcmp',0,'.....',$F0,$24,$F2,$00,$00,$38
  309.  dc.b 'fcos',0,'.....',$F0,$25,$F2,$00,$00,$1D
  310.  dc.b 'fcosh',0,'....',$F0,$25,$F2,$00,$00,$19
  311.  dc.b 'fdbeq',0,'....',$F2,$28,$F2,$48,$00,$01
  312.  dc.b 'fdbf',0,'.....',$F2,$28,$F2,$48,$00,$00
  313.  dc.b 'fdbge',0,'....',$F7,$28,$F2,$48,$00,$13
  314.  dc.b 'fdbgl',0,'....',$F7,$28,$F2,$48,$00,$16
  315.  dc.b 'fdbgle',0,'...',$F7,$28,$F2,$48,$00,$17
  316.  dc.b 'fdbgt',0,'....',$F7,$28,$F2,$48,$00,$12
  317.  dc.b 'fdble',0,'....',$F7,$28,$F2,$48,$00,$15
  318.  dc.b 'fdblt',0,'....',$F7,$28,$F2,$48,$00,$14
  319.  dc.b 'fdbne',0,'....',$F7,$28,$F2,$48,$00,$0E
  320.  dc.b 'fdbnge',0,'...',$F7,$28,$F2,$48,$00,$1C
  321.  dc.b 'fdbngl',0,'...',$F7,$28,$F2,$48,$00,$19
  322.  dc.b 'fdbngle',0,'..',$F7,$28,$F2,$48,$00,$18
  323.  dc.b 'fdbngt',0,'...',$F7,$28,$F2,$48,$00,$1D
  324.  dc.b 'fdbnle',0,'...',$F7,$28,$F2,$48,$00,$1A
  325.  dc.b 'fdbnlt',0,'...',$F7,$28,$F2,$48,$00,$1B
  326.  dc.b 'fdboge',0,'...',$F2,$28,$F2,$48,$00,$03
  327.  dc.b 'fdbogl',0,'...',$F2,$28,$F2,$48,$00,$06
  328.  dc.b 'fdbogt',0,'...',$F2,$28,$F2,$48,$00,$02
  329.  dc.b 'fdbole',0,'...',$F2,$28,$F2,$48,$00,$05
  330.  dc.b 'fdbolt',0,'...',$F2,$28,$F2,$48,$00,$04
  331.  dc.b 'fdbor',0,'....',$F2,$28,$F2,$48,$00,$07
  332.  dc.b 'fdbra',0,'....',$F2,$28,$F2,$48,$00,$00 ;*
  333.  dc.b 'fdbseq',0,'...',$F7,$28,$F2,$48,$00,$11
  334.  dc.b 'fdbsf',0,'....',$F7,$28,$F2,$48,$00,$10
  335.  dc.b 'fdbsne',0,'...',$F7,$28,$F2,$48,$00,$1E
  336.  dc.b 'fdbst',0,'....',$F7,$28,$F2,$48,$00,$1F
  337.  dc.b 'fdbt',0,'.....',$F7,$28,$F2,$48,$00,$0F
  338.  dc.b 'fdbueq',0,'...',$F2,$28,$F2,$48,$00,$09
  339.  dc.b 'fdbuge',0,'...',$F2,$28,$F2,$48,$00,$0B
  340.  dc.b 'fdbugt',0,'...',$F2,$28,$F2,$48,$00,$0A
  341.  dc.b 'fdbule',0,'...',$F2,$28,$F2,$48,$00,$0D
  342.  dc.b 'fdbult',0,'...',$F2,$28,$F2,$48,$00,$0C
  343.  dc.b 'fdbun',0,'....',$F2,$28,$F2,$48,$00,$08
  344.  dc.b 'fdiv',0,'.....',$F0,$24,$F2,$00,$00,$20
  345.  dc.b 'fetox',0,'....',$F0,$25,$F2,$00,$00,$10
  346.  dc.b 'fetoxm1',0,'..',$F0,$25,$F2,$00,$00,$08
  347.  dc.b 'fgetexp',0,'..',$F0,$25,$F2,$00,$00,$1E
  348.  dc.b 'fgetman',0,'..',$F0,$25,$F2,$00,$00,$1F
  349.  dc.b 'filecom',0,'..',$17,$00,$00,$00,$00,$00
  350.  dc.b 'fint',0,'.....',$F0,$25,$F2,$00,$00,$01
  351.  dc.b 'fintrz',0,'...',$F0,$25,$F2,$00,$00,$03
  352.  dc.b 'flog10',0,'...',$F0,$25,$F2,$00,$00,$15
  353.  dc.b 'flog2',0,'....',$F0,$25,$F2,$00,$00,$16
  354.  dc.b 'flogn',0,'....',$F0,$25,$F2,$00,$00,$14
  355.  dc.b 'flognp1',0,'..',$F0,$25,$F2,$00,$00,$06
  356.  dc.b 'fmod',0,'.....',$F0,$24,$F2,$00,$00,$21
  357.  dc.b 'fmove',0,'....',$F0,$21,$F2,$00,$00,$00
  358.  dc.b 'fmovecr',0,'..',$F0,$22,$F2,$00,$5C,$00
  359.  dc.b 'fmovem',0,'...',$F0,$23,$F2,$00,$C0,$00 ;error in fmovem in Motorola
  360.  dc.b 'fmul',0,'.....',$F0,$24,$F2,$00,$00,$23 ;manual - see in Modefl.
  361.  dc.b 'fneg',0,'.....',$F0,$25,$F2,$00,$00,$1A ;(also, Barfly has a bug)
  362.  dc.b 'fnop',0,'.....',$F0,$2A,$F2,$80,$00,$00
  363.  dc.b 'fo',0,'.......',$18,$00,$00,$00,$00,$00
  364.  dc.b 'format',0,'...',$19,$00,$00,$00,$00,$00
  365.  dc.b 'foset',0,'....',$40,$00,$00,$00,$00,$00
  366.  dc.b 'foval',0,'....',$1A,$00,$00,$00,$00,$00
  367.  dc.b 'frem',0,'.....',$F0,$24,$F2,$00,$00,$25
  368.  dc.b 'frestore',0,'.',$FB,$2B,$F3,$40,$00,$00
  369.  dc.b 'fsave',0,'....',$FC,$2B,$F3,$00,$00,$00
  370.  dc.b 'fscale',0,'...',$F0,$24,$F2,$00,$00,$26
  371.  dc.b 'fseq',0,'.....',$F3,$29,$F2,$40,$00,$01
  372.  dc.b 'fsf',0,'......',$F3,$29,$F2,$40,$00,$00
  373.  dc.b 'fsge',0,'.....',$F8,$29,$F2,$40,$00,$13
  374.  dc.b 'fsgl',0,'.....',$F8,$29,$F2,$40,$00,$16
  375.  dc.b 'fsgldiv',0,'..',$F0,$24,$F2,$00,$00,$24
  376.  dc.b 'fsgle',0,'....',$F8,$29,$F2,$40,$00,$17
  377.  dc.b 'fsglmul',0,'..',$F0,$24,$F2,$00,$00,$27
  378.  dc.b 'fsgt',0,'.....',$F8,$29,$F2,$40,$00,$12
  379.  dc.b 'fsin',0,'.....',$F0,$25,$F2,$00,$00,$0E
  380.  dc.b 'fsincos',0,'..',$F0,$26,$F2,$00,$00,$30
  381.  dc.b 'fsinh',0,'....',$F0,$25,$F2,$00,$00,$02
  382.  dc.b 'fsle',0,'.....',$F8,$29,$F2,$40,$00,$15
  383.  dc.b 'fslt',0,'.....',$F8,$29,$F2,$40,$00,$14
  384.  dc.b 'fsne',0,'.....',$F8,$29,$F2,$40,$00,$0E
  385.  dc.b 'fsnge',0,'....',$F8,$29,$F2,$40,$00,$1C
  386.  dc.b 'fsngl',0,'....',$F8,$29,$F2,$40,$00,$19
  387.  dc.b 'fsngle',0,'...',$F8,$29,$F2,$40,$00,$18
  388.  dc.b 'fsngt',0,'....',$F8,$29,$F2,$40,$00,$1D
  389.  dc.b 'fsnle',0,'....',$F8,$29,$F2,$40,$00,$1A
  390.  dc.b 'fsnlt',0,'....',$F8,$29,$F2,$40,$00,$1B
  391.  dc.b 'fsoge',0,'....',$F3,$29,$F2,$40,$00,$03
  392.  dc.b 'fsogl',0,'....',$F3,$29,$F2,$40,$00,$06
  393.  dc.b 'fsogt',0,'....',$F3,$29,$F2,$40,$00,$02
  394.  dc.b 'fsole',0,'....',$F3,$29,$F2,$40,$00,$05
  395.  dc.b 'fsolt',0,'....',$F3,$29,$F2,$40,$00,$04
  396.  dc.b 'fsor',0,'.....',$F3,$29,$F2,$40,$00,$07
  397.  dc.b 'fsqrt',0,'....',$F0,$25,$F2,$00,$00,$04
  398.  dc.b 'fsseq',0,'....',$F8,$29,$F2,$40,$00,$11
  399.  dc.b 'fssf',0,'.....',$F8,$29,$F2,$40,$00,$10
  400.  dc.b 'fssne',0,'....',$F8,$29,$F2,$40,$00,$1E
  401.  dc.b 'fsst',0,'.....',$F8,$29,$F2,$40,$00,$1F
  402.  dc.b 'fst',0,'......',$F8,$29,$F2,$40,$00,$0F
  403.  dc.b 'fsub',0,'.....',$F0,$24,$F2,$00,$00,$28
  404.  dc.b 'fsueq',0,'....',$F3,$29,$F2,$40,$00,$09
  405.  dc.b 'fsuge',0,'....',$F3,$29,$F2,$40,$00,$0B
  406.  dc.b 'fsugt',0,'....',$F3,$29,$F2,$40,$00,$0A
  407.  dc.b 'fsule',0,'....',$F3,$29,$F2,$40,$00,$0D
  408.  dc.b 'fsult',0,'....',$F3,$29,$F2,$40,$00,$0C
  409.  dc.b 'fsun',0,'.....',$F3,$29,$F2,$40,$00,$08
  410.  dc.b 'ftan',0,'.....',$F0,$25,$F2,$00,$00,$0F
  411.  dc.b 'ftanh',0,'....',$F0,$25,$F2,$00,$00,$09
  412.  dc.b 'ftentox',0,'..',$F0,$25,$F2,$00,$00,$12
  413.  dc.b 'ftrapeq',0,'..',$FD,$2D,$F2,$78,$00,$01
  414.  dc.b 'ftrapf',0,'...',$FD,$2D,$F2,$78,$00,$00
  415.  dc.b 'ftrapge',0,'..',$FD,$2D,$F2,$78,$00,$13
  416.  dc.b 'ftrapgl',0,'..',$FD,$2D,$F2,$78,$00,$16
  417.  dc.b 'ftrapgle',0,'.',$FD,$2D,$F2,$78,$00,$17
  418.  dc.b 'ftrapgt',0,'..',$FD,$2D,$F2,$78,$00,$12
  419.  dc.b 'ftraple',0,'..',$FD,$2D,$F2,$78,$00,$15
  420.  dc.b 'ftraplt',0,'..',$FD,$2D,$F2,$78,$00,$14
  421.  dc.b 'ftrapne',0,'..',$FD,$2D,$F2,$78,$00,$0E
  422.  dc.b 'ftrapnge',0,'.',$FD,$2D,$F2,$78,$00,$1C
  423.  dc.b 'ftrapngl',0,'.',$FD,$2D,$F2,$78,$00,$19
  424.  dc.b 'ftrapngle',0,'',$FD,$2D,$F2,$78,$00,$18
  425.  dc.b 'ftrapngt',0,'.',$FD,$2D,$F2,$78,$00,$1D
  426.  dc.b 'ftrapnle',0,'.',$FD,$2D,$F2,$78,$00,$1A
  427.  dc.b 'ftrapnlt',0,'.',$FD,$2D,$F2,$78,$00,$1B
  428.  dc.b 'ftrapoge',0,'.',$FD,$2D,$F2,$78,$00,$03
  429.  dc.b 'ftrapogl',0,'.',$FD,$2D,$F2,$78,$00,$06
  430.  dc.b 'ftrapogt',0,'.',$FD,$2D,$F2,$78,$00,$02
  431.  dc.b 'ftrapole',0,'.',$FD,$2D,$F2,$78,$00,$05
  432.  dc.b 'ftrapolt',0,'.',$FD,$2D,$F2,$78,$00,$04
  433.  dc.b 'ftrapor',0,'..',$FD,$2D,$F2,$78,$00,$07
  434.  dc.b 'ftrapseq',0,'.',$FD,$2D,$F2,$78,$00,$11
  435.  dc.b 'ftrapsf',0,'..',$FD,$2D,$F2,$78,$00,$10
  436.  dc.b 'ftrapsne',0,'.',$FD,$2D,$F2,$78,$00,$1E
  437.  dc.b 'ftrapst',0,'..',$FD,$2D,$F2,$78,$00,$1F
  438.  dc.b 'ftrapt',0,'...',$FD,$2D,$F2,$78,$00,$0F
  439.  dc.b 'ftrapueq',0,'.',$fD,$2D,$F2,$78,$00,$09
  440.  dc.b 'ftrapuge',0,'.',$FD,$2D,$F2,$78,$00,$0B
  441.  dc.b 'ftrapugt',0,'.',$FD,$2D,$F2,$78,$00,$0A
  442.  dc.b 'ftrapule',0,'.',$FD,$2D,$F2,$78,$00,$0D
  443.  dc.b 'ftrapult',0,'.',$FD,$2D,$F2,$78,$00,$0C
  444.  dc.b 'ftrapun',0,'..',$FD,$2D,$F2,$78,$00,$08
  445.  dc.b 'ftst',0,'.....',$F4,$2C,$F2,$00,$00,$3A
  446.  dc.b 'ftwotox',0,'..',$F0,$25,$F2,$00,$00,$11
  447.  dc.b 'global',0,'...',$1B,$00,$00,$00,$00,$00
  448.  dc.b 'ibytes',0,'...',$5D,$00,$00,$00,$00,$00
  449.  dc.b 'identify',0,'.',$1C,$00,$00,$00,$00,$00
  450.  dc.b 'idnt',0,'.....',$1D,$00,$00,$00,$00,$00
  451.  dc.b 'ifc',0,'......',$1E,$00,$00,$00,$00,$00
  452.  dc.b 'ifd',0,'......',$1E,$01,$00,$00,$00,$00
  453.  dc.b 'ifeq',0,'.....',$1E,$02,$00,$00,$00,$00
  454.  dc.b 'ifge',0,'.....',$1E,$03,$00,$00,$00,$00
  455.  dc.b 'ifgt',0,'.....',$1E,$04,$00,$00,$00,$00
  456.  dc.b 'ifle',0,'.....',$1E,$05,$00,$00,$00,$00
  457.  dc.b 'iflt',0,'.....',$1E,$06,$00,$00,$00,$00
  458.  dc.b 'ifmacrod',0,'.',$1E,$07,$00,$00,$00,$00
  459.  dc.b 'ifmacrond',0,'',$1E,$08,$00,$00,$00,$00
  460.  dc.b 'ifnc',0,'.....',$1E,$09,$00,$00,$00,$00
  461.  dc.b 'ifnd',0,'.....',$1E,$0A,$00,$00,$00,$00
  462.  dc.b 'ifne',0,'.....',$1E,$0B,$00,$00,$00,$00
  463.  dc.b 'illegal',0,'..',$D5,$00,$4A,$FC,$00,$00
  464.  dc.b 'incbin',0,'...',$5E,$00,$00,$00,$00,$00
  465.  dc.b 'incdir',0,'...',$4A,$00,$00,$00,$00,$00
  466.  dc.b 'include',0,'..',$4B,$00,$00,$00,$00,$00
  467.  dc.b 'incpath',0,'..',$1F,$00,$00,$00,$00,$00
  468.  dc.b 'istring',0,'..',$5F,$00,$00,$00,$00,$00
  469.  dc.b 'jmp',0,'......',$CA,$3F,$4E,$C0,$00,$00
  470.  dc.b 'jsr',0,'......',$C5,$3F,$4E,$80,$00,$00
  471.  dc.b 'lea',0,'......',$9B,$30,$41,$C0,$00,$00
  472.  dc.b 'link',0,'.....',$C6,$31,$4E,$50,$00,$00
  473.  dc.b 'linkobj',0,'..',$20,$00,$00,$00,$00,$00
  474.  dc.b 'list',0,'.....',$21,$00,$00,$00,$00,$00
  475.  dc.b 'listfile',0,'.',$22,$00,$00,$00,$00,$00
  476.  dc.b 'llen',0,'.....',$23,$00,$00,$00,$00,$00
  477.  dc.b 'lsl',0,'......',$9C,$0A,$E1,$08,$01,$00 ;byte 14 used
  478.  dc.b 'lsr',0,'......',$9D,$0A,$E0,$08,$01,$00 ;byte 14 used
  479.  dc.b 'macro',0,'....',$24,$00,$00,$00,$00,$00
  480.  dc.b 'mask2',0,'....',$25,$00,$00,$00,$00,$00
  481.  dc.b 'mc68000',0,'..',$26,$00,$00,$00,$00,$00
  482.  dc.b 'mc68010',0,'..',$26,$00,$00,$01,$00,$00
  483.  dc.b 'mc68020',0,'..',$26,$00,$00,$02,$00,$00
  484.  dc.b 'mc68030',0,'..',$26,$00,$00,$03,$00,$00
  485.  dc.b 'mc68040',0,'..',$26,$00,$00,$04,$00,$00
  486.  dc.b 'mc68060',0,'..',$26,$00,$00,$05,$00,$00
  487.  dc.b 'mc68881',0,'..',$26,$00,$00,$06,$00,$00
  488.  dc.b 'mc68882',0,'..',$26,$00,$00,$07,$00,$00
  489.  dc.b 'mexit',0,'....',$27,$00,$00,$00,$00,$00
  490.  dc.b 'move',0,'.....',$9E,$32,$00,$00,$00,$00 ;}
  491.  dc.b 'move',0,'.....',$9F,$34,$40,$C0,$00,$00 ;}
  492.  dc.b 'move',0,'.....',$D6,$34,$40,$C0,$00,$00 ;}
  493.  dc.b 'move',0,'.....',$D7,$35,$4E,$60,$00,$00 ;}
  494.  dc.b 'movea',0,'....',$A0,$33,$00,$40,$00,$00
  495.  dc.b 'movec',0,'....',$D8,$36,$4E,$7A,$00,$00
  496.  dc.b 'movem',0,'....',$A1,$37,$48,$80,$00,$00
  497.  dc.b 'movep',0,'....',$A2,$38,$00,$08,$00,$00
  498.  dc.b 'moveq',0,'....',$A3,$39,$70,$00,$00,$00
  499.  dc.b 'moves',0,'....',$D9,$3A,$0E,$00,$00,$00
  500.  dc.b 'muls',0,'.....',$A4,$3B,$00,$00,$00,$00
  501.  dc.b 'mulu',0,'.....',$A5,$3B,$00,$00,$00,$00
  502.  dc.b 'nb',0,'.......',$55,$01,$00,$00,$00,$00
  503.  dc.b 'nbcd',0,'.....',$A6,$2E,$48,$00,$00,$00
  504.  dc.b 'neg',0,'......',$A7,$13,$44,$00,$00,$00
  505.  dc.b 'negx',0,'.....',$A8,$13,$40,$00,$00,$00
  506.  dc.b 'nl',0,'.......',$58,$01,$00,$00,$00,$00
  507.  dc.b 'noformat',0,'.',$28,$00,$00,$00,$00,$00
  508.  dc.b 'nol',0,'......',$29,$00,$00,$00,$00,$00
  509.  dc.b 'nolist',0,'...',$29,$00,$00,$00,$00,$00
  510.  dc.b 'noobj',0,'....',$2C,$00,$00,$00,$00,$00
  511.  dc.b 'nop',0,'......',$A9,$00,$4E,$71,$00,$00
  512.  dc.b 'nopage',0,'...',$2B,$00,$00,$00,$00,$00
  513.  dc.b 'not',0,'......',$AA,$13,$46,$00,$00,$00
  514.  dc.b 'nw',0,'.......',$6B,$01,$00,$00,$00,$00
  515.  dc.b 'objfile',0,'..',$2D,$00,$00,$00,$00,$00
  516.  dc.b 'odd',0,'......',$63,$00,$00,$00,$00,$00
  517.  dc.b 'offset',0,'...',$2E,$00,$00,$00,$00,$00
  518.  dc.b 'or',0,'.......',$AB,$07,$80,$00,$00,$00 ;14-15=ori mc
  519.  dc.b 'org',0,'......',$2F,$00,$00,$00,$00,$00
  520.  dc.b 'ori',0,'......',$AC,$04,$00,$00,$00,$00 ;}
  521.  dc.b 'ori',0,'......',$AD,$04,$00,$00,$00,$00 ;}ori ccr
  522.  dc.b 'ori',0,'......',$DA,$04,$00,$00,$00,$00 ;}ori sr
  523.  dc.b 'output',0,'...',$30,$00,$00,$00,$00,$00
  524.  dc.b 'pack',0,'.....',$AE,$3E,$81,$40,$00,$00
  525.  dc.b 'pad',0,'......',$69,$00,$00,$00,$00,$00 ;n.b. $6A spare
  526.  dc.b 'page',0,'.....',$31,$00,$00,$00,$00,$00
  527.  dc.b 'pb',0,'.......',$55,$02,$00,$00,$00,$00
  528.  dc.b 'pea',0,'......',$AF,$3F,$48,$40,$00,$00
  529.  dc.b 'pflush',0,'...',$DB,$40,$F0,$00,$00,$00
  530.  dc.b 'pflusha',0,'..',$DC,$41,$F0,$00,$00,$00
  531.  dc.b 'pl',0,'.......',$58,$02,$00,$00,$00,$00
  532.  dc.b 'plen',0,'.....',$32,$00,$00,$00,$00,$00
  533.  dc.b 'ploadr',0,'...',$DD,$42,$00,$00,$00,$00
  534.  dc.b 'ploadw',0,'...',$DE,$43,$00,$00,$00,$00
  535.  dc.b 'pmove',0,'....',$DF,$44,$00,$00,$00,$00
  536.  dc.b 'pmovefd',0,'..',$E8,$45,$00,$00,$00,$00
  537.  dc.b 'printx',0,'...',$33,$00,$00,$00,$00,$00
  538.  dc.b 'pstring',0,'..',$67,$00,$00,$00,$00,$00
  539.  dc.b 'ptestr',0,'...',$E0,$46,$00,$00,$00,$00
  540.  dc.b 'ptestw',0,'...',$E9,$47,$00,$00,$00,$00
  541.  dc.b 'public',0,'...',$34,$00,$00,$00,$00,$00
  542.  dc.b 'pure',0,'.....',$35,$00,$00,$00,$00,$00
  543.  dc.b 'pw',0,'.......',$6B,$02,$00,$00,$00,$00
  544.  dc.b 'quad',0,'.....',$68,$00,$00,$00,$00,$00
  545.  dc.b 'reg',0,'......',$36,$00,$00,$00,$00,$00
  546.  dc.b 'repeat',0,'...',$37,$00,$00,$00,$00,$00
  547.  dc.b 'rept',0,'.....',$38,$00,$00,$00,$00,$00
  548.  dc.b 'reset',0,'....',$E1,$00,$4E,$70,$00,$00
  549.  dc.b 'rol',0,'......',$B0,$0A,$E1,$18,$11,$00 ;byte 14 used
  550.  dc.b 'ror',0,'......',$B1,$0A,$E0,$18,$11,$00 ;byte 14 used
  551.  dc.b 'rorg',0,'.....',$39,$00,$00,$00,$00,$00
  552.  dc.b 'roxl',0,'.....',$B2,$0A,$E1,$10,$10,$00 ;byte 14 used
  553.  dc.b 'roxr',0,'.....',$B3,$0A,$E0,$10,$10,$00 ;byte 14 used
  554.  dc.b 'rs',0,'.......',$3A,$00,$00,$00,$00,$00
  555.  dc.b 'rsreset',0,'..',$3B,$00,$00,$00,$00,$00
  556.  dc.b 'rsset',0,'....',$3C,$00,$00,$00,$00,$00
  557.  dc.b 'rsval',0,'....',$3D,$00,$00,$00,$00,$00
  558.  dc.b 'rtd',0,'......',$C7,$48,$4E,$74,$00,$00
  559.  dc.b 'rte',0,'......',$E2,$00,$4E,$73,$00,$00
  560.  dc.b 'rtr',0,'......',$E3,$00,$4E,$77,$00,$00
  561.  dc.b 'rts',0,'......',$C8,$00,$4E,$75,$00,$00
  562.  dc.b 'sb',0,'.......',$55,$03,$00,$00,$00,$00 ;=db
  563.  dc.b 'sbcd',0,'.....',$B4,$01,$81,$00,$00,$00
  564.  dc.b 'scc',0,'......',$B5,$2F,$54,$C0,$00,$00
  565.  dc.b 'scs',0,'......',$B5,$2F,$55,$C0,$00,$00
  566.  dc.b 'section',0,'..',$3E,$00,$00,$00,$00,$00
  567.  dc.b 'seq',0,'......',$B5,$2F,$57,$C0,$00,$00
  568.  dc.b 'set',0,'......',$3F,$00,$00,$00,$00,$00
  569.  dc.b 'setfo',0,'....',$40,$00,$00,$00,$00,$00
  570.  dc.b 'setrs',0,'....',$3C,$00,$00,$00,$00,$00
  571.  dc.b 'setso',0,'....',$3C,$00,$00,$00,$00,$00 ;n.b. $42 is spare
  572.  dc.b 'sf',0,'.......',$B5,$2F,$51,$C0,$00,$00
  573.  dc.b 'sge',0,'......',$B5,$2F,$5C,$C0,$00,$00
  574.  dc.b 'sgt',0,'......',$B5,$2F,$5E,$C0,$00,$00
  575.  dc.b 'shi',0,'......',$B5,$2F,$52,$C0,$00,$00
  576.  dc.b 'sl',0,'.......',$58,$03,$00,$00,$00,$00 ;=dl
  577.  dc.b 'sle',0,'......',$B5,$2F,$5F,$C0,$00,$00
  578.  dc.b 'sls',0,'......',$B5,$2F,$53,$C0,$00,$00
  579.  dc.b 'slt',0,'......',$B5,$2F,$5D,$C0,$00,$00
  580.  dc.b 'smalldata',0,'',$2A,$00,$00,$00,$00,$00
  581.  dc.b 'smi',0,'......',$B5,$2F,$5B,$C0,$00,$00
  582.  dc.b 'sne',0,'......',$B5,$2F,$56,$C0,$00,$00
  583.  dc.b 'so',0,'.......',$3A,$00,$00,$00,$00,$00 ;same as rs
  584.  dc.b 'soreset',0,'..',$3B,$00,$00,$00,$00,$00 ;same as rsreset
  585.  dc.b 'soset',0,'....',$3C,$00,$00,$00,$00,$00 ;same as rsset
  586.  dc.b 'soval',0,'....',$3D,$00,$00,$00,$00,$00 ;same as rsval
  587.  dc.b 'spc',0,'......',$43,$00,$00,$00,$00,$00
  588.  dc.b 'spl',0,'......',$B5,$2F,$5A,$C0,$00,$00
  589.  dc.b 'sprintx',0,'..',$44,$00,$00,$00,$00,$00
  590.  dc.b 'st',0,'.......',$B5,$2F,$50,$C0,$00,$00
  591.  dc.b 'stop',0,'.....',$E4,$48,$4E,$72,$00,$00
  592.  dc.b 'sub',0,'......',$B6,$02,$90,$00,$04,$00 ;14-15=subi mc
  593.  dc.b 'suba',0,'.....',$B7,$03,$90,$00,$00,$00
  594.  dc.b 'subi',0,'.....',$B8,$04,$04,$00,$00,$00
  595.  dc.b 'subq',0,'.....',$B9,$05,$51,$00,$00,$00
  596.  dc.b 'subx',0,'.....',$BA,$06,$91,$00,$00,$00
  597.  dc.b 'super',0,'....',$45,$00,$00,$00,$00,$00
  598.  dc.b 'svc',0,'......',$B5,$2F,$58,$C0,$00,$00
  599.  dc.b 'svs',0,'......',$B5,$2F,$59,$C0,$00,$00
  600.  dc.b 'sw',0,'.......',$6B,$03,$00,$00,$00,$00 ;=dw
  601.  dc.b 'swap',0,'.....',$BB,$49,$48,$40,$00,$00
  602.  dc.b 'tas',0,'......',$BC,$2E,$4A,$C0,$00,$00
  603.  dc.b 'trap',0,'.....',$E5,$3D,$4E,$40,$00,$00
  604.  dc.b 'trapcc',0,'...',$E6,$3C,$54,$F8,$00,$00
  605.  dc.b 'trapcs',0,'...',$E6,$3C,$55,$F8,$00,$00
  606.  dc.b 'trapeq',0,'...',$E6,$3C,$57,$F8,$00,$00
  607.  dc.b 'trapf',0,'....',$E6,$3C,$51,$F8,$00,$00
  608.  dc.b 'trapge',0,'...',$E6,$3C,$5C,$F8,$00,$00
  609.  dc.b 'trapgt',0,'...',$E6,$3C,$5E,$F8,$00,$00
  610.  dc.b 'traphi',0,'...',$E6,$3C,$52,$F8,$00,$00
  611.  dc.b 'traple',0,'...',$E6,$3C,$5F,$F8,$00,$00
  612.  dc.b 'trapls',0,'...',$E6,$3C,$53,$F8,$00,$00
  613.  dc.b 'traplt',0,'...',$E6,$3C,$5D,$F8,$00,$00
  614.  dc.b 'trapmi',0,'...',$E6,$3C,$5B,$F8,$00,$00
  615.  dc.b 'trapne',0,'...',$E6,$3C,$56,$F8,$00,$00
  616.  dc.b 'trappl',0,'...',$E6,$3C,$5A,$F8,$00,$00
  617.  dc.b 'trapt',0,'....',$E6,$3C,$50,$F8,$00,$00
  618.  dc.b 'trapv',0,'....',$E7,$00,$4E,$76,$00,$00
  619.  dc.b 'trapvc',0,'...',$E6,$3C,$58,$F8,$00,$00
  620.  dc.b 'trapvs',0,'...',$E6,$3C,$59,$F8,$00,$00
  621.  dc.b 'trashreg',0,'.',$47,$00,$00,$00,$00,$00
  622.  dc.b 'tst',0,'......',$BD,$4A,$4A,$00,$00,$00
  623.  dc.b 'ttl',0,'......',$46,$00,$00,$00,$00,$00
  624.  dc.b 'ub',0,'.......',$55,$04,$00,$00,$00,$00
  625.  dc.b 'ul',0,'.......',$58,$04,$00,$00,$00,$00
  626.  dc.b 'unlk',0,'.....',$C9,$4B,$00,$00,$00,$00
  627.  dc.b 'unpk',0,'.....',$BE,$3E,$81,$80,$00,$00
  628.  dc.b 'uw',0,'.......',$6B,$04,$00,$00,$00,$00
  629.  dc.b 'xdef',0,'.....',$48,$00,$00,$00,$00,$00
  630.  dc.b 'xref',0,'.....',$49,$00,$00,$00,$00,$00
  631. opend:
  632.  
  633. * save opcodes to file
  634. Program:
  635.  TLstrbuf #1
  636.  TLopenwrite
  637.  beq Pr_bad1
  638.  move.l #opend-opcodes,(a4) ;send filesize (excl first 4 bytes)
  639.  TLwritefile a4,#4
  640.  beq Pr_bad2
  641.  TLwritefile #opcodes,#opend-opcodes ;send opcodes - 16 bytes ea.
  642.  beq Pr_bad2
  643.  TLclosefile
  644.  TLstrbuf #4
  645.  TLoutput
  646.  rts
  647. Pr_bad1:
  648.  TLbad #2
  649.  rts
  650. Pr_bad2:
  651.  TLbad #3
  652.  rts
  653.